Competitions
<%
sql="select main_title, image1, intColumn3, main_strap, main_body from site_items where id = " & Request.QueryString("id")
set RSans = Conn.execute(SQL)
if not RSans.bof and not RSans.eof then
session("ansReq") = RSans("intColumn3")
'if null assume required
if session("ansReq") = "" or isnull(session("ansReq")) or isempty(session("ansReq")) or session("ansReq") = 1 then
session("ansReq") = "yes"
else
session("ansReq") = "no"
end if
end if
main_strap = trim(RSans("main_strap"))
main_body = trim(RSans("main_body"))
if main_strap <> "" then
main_strap = replace(main_strap, vbcrlf, "
")
end if
if main_body <> "" then
main_body = replace(main_body, vbcrlf, "
")
end if
%>